home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
SPACE 1
/
SPACE - Library 1 - Volume 1.iso
/
program
/
355
/
source
/
ifsdemo
/
ifs.doc
< prev
next >
Wrap
Text File
|
1990-02-02
|
3KB
|
71 lines
IFS Decoder
This program is a demonstration of Iterated Function Systems based on an
article entitled 'A Better Way to Compress Images' by Michael F. Barnsley
and Alan D. Sloan, Byte Magazine, Vol. 13, No. 1. For detailed information
on the operation of the program I must refer you to the article. I'm no
expert.
I wrote the program because I was, and am, interested in the ideas presented
in the article. I have uploaded it for two reasons. (1) You may also be
interested in the image processing techniques demonstrated. (2) It may serve
as example of GEM programming using the Jefferson Software Modula-2
development system.
To expand on reason 1, there are four fairly complex images produced by the
program. Each image is represented by only 32 REAL numbers. This represents
a phenomenal degree of image compression.
As regards reason 2, I have only been writing Modula-2 for a couple of weeks
and have found it to be an extremely easy to use tool for producing high
quality software. This program was produced in less than half the time it
would have taken me to produce the same program in C. I will leave the
religious arguments about languages to someone else, but I personally find
Modula-2 to be a very sharp tool indeed. There is, however, a shortage of good
quality examples of ST programming in Modula-2. While this program is certainly
not flawless, it does illustrate many of the procedures necessary to write a
GEM program in Modula-2.
In addition to the IFS program and source, the source is provided for several
additional modules that I have found useful in GEM programming. They are
not complete, or even necessarily good, but they are used in this program
and I have found them generally useful. If you want them, here they are.
Be patient when running the program. These are fractal images and take about
4 minutes each to draw. The purpose of the technique is image compression, not
fast reproduction.
Sorry, this thing only runs in mono at this point. You will have to modify the
source to run on a color system.
If any of you make substantial additions or improvements to the program I would
appreciate it if you would upload them to GEnie and let me know.
Finally, many thanks to Ken and Gary at Jefferson Software. They have been
most patient and helpful to me in getting started with their Modula-2
system. Thanks again, guys!
Mike Long, 1/16/88
Files in this archive:
IFS.PRG - The IFS demo program.
IFS.MOD - The source code.
IFS.RSC - The resource file.
BITSTUFF.DEF - Some useful bit manipulation routines.
BITSTUFF.MOD
GEMCONST.DEF - Some useful GEM constant definitions.
GEMCONST.MOD
GEMTYPES.DEF - Some useful GEM type declarations.
GEMTYPES.MOD
GEMPROCS.DEF - Some useful GEM procedures.
GEMPROCS.MOD
MAKEIFS.G - A gulam script that will compile and link the whole mess.
IFS.DOC - This file.